home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / MASM.ZIP / SAMPLES / MIXED / PASMAIN.PA$ / PASMAIN.bin
Encoding:
Text File  |  1991-02-14  |  289 b   |  12 lines
  1. (* Calls assembly module Power2 (defined in PASCAL.ASM)
  2.  * To compile:
  3.  *   PL pasmain.pas pascal.obj
  4.  *)
  5.  
  6. program Asmtest( input, output );
  7. function Power2( a:integer; b:integer ): integer; extern;
  8. begin
  9.     writeln( '3 times 2 to the power of 5 is ', Power2( 3, 5 ) );
  10. end.
  11. 
  12.